home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / BUSINESS / PICS.LZH / UNPACK1.EXE / INSTALL.‾BA < prev    next >
Text File  |  1992-08-09  |  2KB  |  107 lines
  1. @echo off
  2. cls
  3.  
  4. if "%1==" goto hlpinst
  5. if "%2==" goto hlpinst
  6.  
  7. :loop1
  8. cls
  9. echo Files will be copied to %2\ICP
  10. echo .
  11. pause
  12. if exist %1unpack.exe goto ok1
  13. cls
  14. echo Wrong disk or missing files...
  15. echo Ctrl+"c" to abort
  16. pause
  17. goto loop1
  18.  
  19. :ok1
  20. cls
  21. echo Copying the PICS/ICP System files to Drive %2\ICP
  22. %2
  23. cd\
  24. md\icp
  25. cd\ICP
  26. if exist inven.dbf goto backup
  27. %1unpack
  28. goto finish
  29.  
  30. :finish
  31. cls
  32. echo PICS/ICP System files successfully installed.
  33. echo .
  34. echo WARNING! PICS/ICP will not run unless certain system parameters are
  35. echo properly established. Consult the "manual.doc" file for information 
  36. echo concerning this process. 
  37. echo .
  38. echo Thank you!
  39. echo God Bless!
  40. goto end
  41.  
  42. :hlpinst
  43. cls
  44. echo The correct syntax is "install <source: target:>"
  45. echo INSTALLATION ABORTED!
  46. goto end
  47.  
  48. :backup
  49. cls
  50. echo .
  51. echo .
  52. echo Install has detected existing data files. These files will be saved
  53. echo and used in your new program.
  54. echo .
  55. echo .
  56. echo IMPORTANT: You must REINDEX after this installation (see User's Guide).
  57. pause
  58. cls
  59. md %2\icp\ins
  60. rename composit.dbf xcomposi.dbf
  61. rename help.dbf xhelp.dbf
  62. rename inven.dbf xinven.dbf
  63. rename po.dbf xpo.dbf
  64. rename reports.dbf xreports.dbf
  65. rename setup.dbf xsetup.dbf
  66. rename vendors.dbf xvendors.dbf
  67.  
  68. rename inven.dbt xinven.dbt
  69. rename help.dbt xhelp.dbt
  70.  
  71. copy x*.dbf %2\icp\ins
  72. copy x*.dbt %2\icp\ins
  73.  
  74. del install.bat
  75. del *.doc
  76.  
  77. del icp.exe
  78. del setup.exe
  79. del rl.exe
  80.  
  81. del i_*.frm
  82. del i_*.lbl
  83.  
  84. del compo1.ntx
  85. del compo2.ntx
  86. del descript.ntx
  87. del dhelp.ntx
  88. del item.ntx
  89. del make.ntx
  90. del part.ntx
  91. del po.ntx
  92. del porpt.ntx
  93. del reports.ntx
  94. del spec.ntx
  95. del vendor.ntx
  96. del vendors.ntx
  97.  
  98. %1unpack
  99. copy %2\icp\ins\*.* %2\icp
  100. transfer
  101. del x*.dbf
  102. del x*.dbt
  103. del transfer.exe
  104. cls
  105. goto finish
  106.  
  107. :end